www.gusucode.com > 落叶冰点万能企业网站内容管理系统 V9.1 > 落叶冰点万能企业网站内容管理系统 V9.1\code\admin\adminCollection\class_index.asp
<%
response.buffer=true
Dim Rs,Sql
%>
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/function.asp"-->
<!--#include file="Admin_ChkPurview.asp"-->
<html>
<head>
<title>采集系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="Admin_Style.css">
<style type="text/css">
.ButtonList {
BORDER-RIGHT: #000000 2px solid; BORDER-TOP: #ffffff 2px solid; BORDER-LEFT: #ffffff 2px solid; CURSOR: default; BORDER-BOTTOM: #999999 2px solid; BACKGROUND-COLOR: #e6e6e6
}
</style>
<SCRIPT language=javascript>
function unselectall(thisform){
if(thisform.chkAll.checked){
thisform.chkAll.checked = thisform.chkAll.checked&0;
}
}
function CheckAll(thisform){
for (var i=0;i<thisform.elements.length-6;i++){
var e = thisform.elements[i];
if (e.Name !="chkAll"&&e.disabled!=true)
e.checked = thisform.chkAll.checked;
}
}
</script>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="border">
<tr class='topbg'>
<td height="22" colspan="2" align="center" ><strong>本 地 数 据 分 类 管 理</strong></td>
</tr>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="border">
<tr class="tdbg">
<td width="65" height="30"><strong>管理导航：</strong></td>
<td height="30"><a href=class_index.asp>管理首页</a> | <a href=class_add.asp?action=添加新频道>添加新频道</a></td>
</tr>
</table>
<br>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="border" >
<tr>
<td height="22" colspan="2" class="title"> <div align="center"><b>频 道 管 理</b></div></td>
</tr>
</table>
<table class="border" border="0" cellspacing="1" width="100%" cellpadding="0">
<TR>
<TD class=ButtonList width="20%" height=22 align=center>
编号</DIV></TD>
<TD class=ButtonList width="30%" height=22 align=center>
频道(点击进入栏目管理)</DIV></TD>
<TD class=ButtonList width="40%" height=22 align=center>
说明</TD>
<TD class=ButtonList width="10%" height=22 align=center>
操作</TD>
</TR>
<%
set Rs=server.createobject("adodb.recordset")
Sql="select * from PE_Channel order by ChannelID DESC"
Rs.open Sql,Conn,1,1
do while not rs.eof
%>
<TR class="tdbg">
<TD class=tdbg width="20%" height=22 align=center>
<%=rs("ChannelID")%></DIV></TD>
<TD class=tdbg width="30%" height=22 align=center>
<A href=smallclass_index.asp?id=<%=rs("ChannelID")%>><%=rs("ChannelName")%></a></DIV></TD>
<TD class=tdbg width="40%" height=22 align=center>
<%=rs("ChannelShortName")%></TD>
<TD class=tdbg width="10%" height=22 align=center>
<a href=class_mod.asp?action=修改频道&id=<%=rs("ChannelID")%>>修改</a> <a href=class_del.asp?id=<%=rs("ChannelID")%>>删除</a></TD>
</TR>
<%
rs.movenext
loop
rs.close
set rs=nothing
%>
</TABLE>
<!--#include file="Admin_ItemFoot.asp"-->
</body>
</html>
<%
Call CloseConn()
Call CloseConnItem()
%>